<init>
#evflagsw(pr_dark,=,1);
resevent(@shoumei,);


#l
<mojinin>
#if(evf(*inmap:item) == 0);
#if(holcircle(r)>=0 && holcircle(r)<256);
#text(1,(face=+evfch,swait=-1),uAɂ肩ȁH@ႠIv);
#else;
#text(1,(face=+evfch,swait=-1),uAɂ肩ȁH@łȂH@ł炱Iv);
#endif;
#item(get,u,1); if(nowres); sound(select); text(0,w%it[*u].nmicxɓꂽI); else; text(0,w%it[*u].nmicx͂ȏ͎ĂȂI); endif;
#evflag(*inmap:item,=,1);
#end;
#endif;

#text(1,(face=+evfch,swait=-1,select=\nǂႤ́H,islc=0),u_WđAЕ̕ǂɉĒT邱ƂŋX܂ŒTł邯ǁA͂͂Ȃʓ|ˁv);
text(1,(face=+evfch,swait=-1,select=Ȃ\nǂƁH,islc=0),u_WđAЕ̕ǂɉĒT邱ƂŋX܂ŒTł邯ǁA͍͂sȂʓ|ˁBłÃXCb`΂s悤ɂȂv);

#select2(reset,all);
#select2(+(id=0));
#select2(+ǂႤ́H(id=1));
#select2(*(cid=-0));

if(evf(*selected) == 1);
#holcircle(,-1);
image(0,set, picture:HP,0,0,0,0,,,,,);
text(1,dsp=2,u炪ǂɉƂŋX܂ŒTł_W̗B̐F̐iHĂBX܂ŒTłĂˁv);
image(0,set, picture:HQ,0,0,0,0,,,,,);
text(1,dsp=2,uāA炪ǂɉƂł͋X܂ŒTłȂ_W̗BwHx̏ƂĂˁBւɂȂĂ镔ƂȂv);
image(0,set,);
#holcircle(,def);
text(1,(face=+evfch,swait=-1),uGƂ̑ƁAĂɂǂǂiłYė]vɖႤBAi^_WƂlȂCtĂˁv\ruŁÃXCb`΁Aꕔ̓ǂŗւf؂邱ƂŁAǂɉƂŋX܂ŒTł悤ɂȂdg݂BނA̒x̍LȂƂȂȂǂˁv);
#BQ[̍ۂɂCtĂ
endif;

subevent(@shoumei,);


#Ƃ炷
<shoumei>
unif(holcircle(r)>=0 && holcircle(r)<256); end; endif;
#evflag(*selected,=,id(item:d)); item(check:eq,*selected,1); if(nowres); goto(1); endif;
#evflag(*selected,=,id(item:u)); item(check:eq,*selected,1); if(nowres); goto(1); endif;
#evflag(*selected,=,id(item:kdc)); item(check:eq,*selected,1); if(nowres); goto(1); endif;
#evflag(*selected,=,id(item:e)); item(check:eq,*selected,1); if(nowres); goto(1); endif;
#evflag(*selected,=,id(item:)); item(check:eq,*selected,1); if(nowres); goto(1); endif;
#evflag(*selected,=,id(item:)); item(check:eq,*selected,1); if(nowres); goto(1); endif;
#evflag(*selected,=,id(item:wbhCg)); item(check:eq,*selected,1); if(nowres); goto(1); endif;
#evflag(*selected,=,id(item:)); item(check:eq,*selected,1); if(nowres); goto(1); endif;
evflag(*selected,=,id(item:z)); item(check:eq,*selected,1); if(nowres); goto(1); endif;
end;
label(1);
holcircle(000000,256);
text(0,w%it[s].nmicxłނI);

#n
<to_f1>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,6,-7,center); fc(*actor,dir,=,r); fc(*actor,float,=,0); changemap(p); fade(in,(type=fade,color=000000,wait=16));


#box_itembsO
<box_item>
evarg(item,gold);

subevent(box_item(evf(*evarg:item),evf(*evarg:gold)),);
subevent(@shoumei,);

#ŠʗL
#fcslc(c1); while; if(nowres); fc(*select,apr,==,1); if(nowres); else; fcslc(*nextlabel); next; endif; endif; wend;

#unif(nowres);
#mc(0,enegref,=,5); mc(54,enegref,=,6);
##feffect(darkf,+,*actor,*actor,0);
#sound(boon); fade(out,(type=fade,color=000000,wait=32)); fade(in,(type=fade,color=000000,wait=32));
##text(0,ӂ̓G̋Czٗlɋ܂I);
#text(1,face=uam,ӂ̓G̋Czٗlɋ܂I\nȋ̕ω͖悤j);
#endif;


#Δ
<brd_dark>
text(1,face=+evfch,͎EĖՂI@܂͉E̕ǂɉĕ̂ǂ̂ł͂Ȃ낤H);


#XCb`
<switch>
fc(*actor,mvable,9,-1); if(nowres);
setmapdat(single,9,-1,0,16);
setmapdat(single,14,-1,0,16);
setmapdat(single,10,-6,0,16);
setmapdat(single,17,-8,0,16);
setmapdat(single,13,-4,0,17);
else;
setmapdat(single,9,-1,0,0);
setmapdat(single,14,-1,0,0);
setmapdat(single,10,-6,0,0);
setmapdat(single,17,-8,0,0);
setmapdat(single,13,-4,0,0);
endif;
sound(attack2); shake(1,4,4,2,2,8); wait(8);


#o
<wall>
text(1,(face=uam,swait=-1,select={^\n{^Ȃ,islc=1),ǂɃXCb`tĂBƁAǂ񂾏Ԃɖ߂悤B);
if(evf(*selected) == 0); subevent(@switch,); endif;


<wall2>
if(evf(*sw:pr_lockdark) == 0);
text(1,(face=uam,swait=-1,select={^\n{^Ȃ,islc=1),悭ׂĂ݂Ƃ̕ǂɂXCb`tĂB̕ǂ̃XCb`Ƃ͈قȂ悤ccH);
if(evf(*selected) == 0); evflagsw(pr_lockdark,=,1); text(1,face=uam,֍~Kiŏ猻悤ɂȂI); endif;
else;
text(1,(face=uam,swait=-1,select={^\n{^Ȃ,islc=1),悭ׂĂ݂Ƃ̕ǂɂXCb`tĂBxƁA֍~KȉԂɖ߂悤BĖ߂ĂӖ͖悤B);
if(evf(*selected) == 0); evflagsw(pr_lockdark,=,0); text(1,face=uam,֍~KȉԂɖ߂B); endif;
endif;

#if(evf(*inmap:item) == 0);
#text(1,face=uam,ǂɉ狲܂ĂB);
#item(get,\,1); if(nowres); sound(select); text(0,w%it[*\].nmicxɓꂽI); evflag(*inmap:item,=,1); else; text(0,w%it[*\].nmicx͂ȏ͎ĂȂI); endif;
#else;
#text(1,face=uam,ȏ͉悤B);
#endif;